home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1995 #5 & #6 / Amiga Plus CD - 1995 - No. 5 and 6.iso / tex / mf / inputs / dc / dxcsc.mf < prev    next >
Text File  |  1994-04-12  |  2KB  |  84 lines
  1. % This is DXCSC.MF in text format, as of March 24, 1992
  2. %
  3. % DC fonts Version 1.1 (prerelease of EC fonts)
  4. %
  5. %          [ heavily borrowed from the Computer Modern Roman family of
  6. %            fonts by D. E. Knuth ]
  7. %
  8. % Content:
  9. %
  10. %   driver file, called by parameter files for "caps and small caps" fonts
  11. %
  12.  
  13. mode_setup;
  14. font_setup;
  15. %
  16. %     dx  r   l   west
  17. %         i   u   east
  18. %         :   :   :
  19. %         :   :   west '3xx / east '2xx
  20. %         :   uppercase/lowercase
  21. %         roman / italic
  22.  
  23. input dxruwest;
  24. input dxrueast;
  25. input dxrulett;  % upper case (majuscules)
  26. %
  27. input dxbraces;  % ^ ~ cwm  ( ) < | > [ ] \ { } _ - (177) space (040)
  28. input dxpunct;   %  < << > >>  ! ` ' *  + , . / = ; : (spanish !)
  29.  
  30. input dxaccent;  %
  31. input dxsign;    %  zero for mille, " # $ % @ pound sign
  32. %
  33. input dxromp;    % (roman punctuation)  & ? (spanish ?)
  34. %
  35. input dxrdigit;  % roman digits
  36. %
  37. %%% fine lower
  38. begingroup
  39. forsuffixes $= u, width_adj, cap_serif_fit, letter_fit,
  40.  body_height, cap_height, x_height, bar_height, comma_depth,
  41.  flare, cap_hair, stem, cap_stem, cap_curve, cap_ess,
  42.  cap_jut, beak_jut, beak, slab, cap_bar, cap_band, cap_notch_cut,
  43.  o, apex_o: save $; $.#:=lower.$.#; endfor
  44. fudge:=lower.fudge;
  45. font_setup; % now try again with |lower| settings
  46.  
  47. input dxcspl;    % dotless i,j; letter ligatures  FF FI FL FFI FFL D-
  48.  
  49.  
  50. extra_endchar:=extra_endchar&"charcode:=charcode+code_offset";
  51. code_offset:=ASCII"a" - ASCII"A";
  52.  
  53. input dxrulett;  % upper case (majuscules)
  54.  
  55. suppress_i_dot := true;
  56.  
  57. input dxruwest;
  58. input dxrueast;
  59.  
  60. endgroup;
  61.  
  62.  
  63. % Fontparameter
  64. %
  65. font_coding_scheme:="Extended TeX Font Encoding - Latin";
  66. if known boundarychar: boundarychar:=oct"027"; fi
  67. font_slant slant; font_x_height x_height#;
  68. if monospace: font_normal_space 9u#; % no stretching or shrinking
  69.  font_quad 18u#;
  70.  font_extra_space 9u#;
  71. else: font_normal_space 6u#+2letter_fit#;
  72.  font_normal_stretch 3u#; font_normal_shrink 2u#;
  73.  font_quad 18u#+4letter_fit#;
  74.  font_extra_space 2u#;
  75.  input dxcligtb;    % do the ligature programs, not for monospaced fonts
  76. fi
  77. font_character_set 1;
  78. font_acc_height acc_height#;
  79. font_cap_height cap_height#;
  80. font_asc_height asc_height#;
  81. font_rule_thickness rule_thickness#;
  82. %font_baselineskip baselineskip#;
  83. bye.
  84.